home *** CD-ROM | disk | FTP | other *** search
/ Delphi Programmer's Power Pack / Delphi Volume 1.iso / s_to_z / t_rex10 / trexdm03.dfm / trexdm03.txt
Text File  |  1996-09-15  |  2KB  |  97 lines
  1. object Form1: TForm1
  2.   Left = 247
  3.   Top = 149
  4.   Width = 296
  5.   Height = 252
  6.   Caption = 'TRex Demo - SubstAll'
  7.   Font.Color = clBlack
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   TextHeight = 13
  13.   object Label1: TLabel
  14.     Left = 16
  15.     Top = 104
  16.     Width = 75
  17.     Height = 13
  18.     Caption = 'Look for &pattern'
  19.     FocusControl = Edit1
  20.   end
  21.   object Label2: TLabel
  22.     Left = 16
  23.     Top = 132
  24.     Width = 8
  25.     Height = 13
  26.     Caption = '&in'
  27.     FocusControl = Edit2
  28.   end
  29.   object Label3: TLabel
  30.     Left = 16
  31.     Top = 160
  32.     Width = 127
  33.     Height = 13
  34.     Caption = '&replace each instance with'
  35.   end
  36.   object Bevel1: TBevel
  37.     Left = 8
  38.     Top = 4
  39.     Width = 273
  40.     Height = 77
  41.   end
  42.   object Label4: TLabel
  43.     Left = 16
  44.     Top = 8
  45.     Width = 257
  46.     Height = 69
  47.     Caption = 
  48.       'This demo illustrates the use of the TRegExp object. A TRex comp' +
  49.       'onent uses these objects, but you can also use them independentl' +
  50.       'y. This program searches for a pattern in a string and replaces ' +
  51.       'all occurrences with a substitution string that you specify.'
  52.     WordWrap = True
  53.   end
  54.   object Edit1: TEdit
  55.     Left = 152
  56.     Top = 100
  57.     Width = 121
  58.     Height = 20
  59.     TabOrder = 0
  60.     Text = '[AEIOUaeiouy]+'
  61.   end
  62.   object Edit2: TEdit
  63.     Left = 152
  64.     Top = 128
  65.     Width = 121
  66.     Height = 20
  67.     TabOrder = 1
  68.     Text = 'You'#39'll soon see how'
  69.   end
  70.   object Edit3: TEdit
  71.     Left = 152
  72.     Top = 156
  73.     Width = 121
  74.     Height = 20
  75.     TabOrder = 2
  76.     Text = 'x'
  77.   end
  78.   object Edit4: TEdit
  79.     Left = 152
  80.     Top = 184
  81.     Width = 121
  82.     Height = 20
  83.     ReadOnly = True
  84.     TabOrder = 4
  85.   end
  86.   object Button1: TButton
  87.     Left = 11
  88.     Top = 181
  89.     Width = 113
  90.     Height = 25
  91.     Caption = 'and &show the result >'
  92.     Default = True
  93.     TabOrder = 3
  94.     OnClick = Button1Click
  95.   end
  96. end
  97.